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. Az elmúlt hónapokban kétségte- 
lenül az IBM-ügy volt 
a számítástechnika világának 
ügye - legalábbis itthon. A sajtó 
legkülönbözőbb fórumain már 
ezerszer lerágták az idevágó 
Megírták már, hogy 
s hogy miért rossz 
a központi pénzeszközök szét- 
osztása a különböző cégek 
között, hogy mennyire mestersé- 
gesek a versenyek ilyesfajta 
hazai szabályozásai, hogy ki 
szerint és miért igazságtalanok 
a pénzszétosztás paraméterei stb. 
Mindezekről tehát nekünk már 
nem érdemes írni, hiszen 
előttünk már mindent leírtak. 
(Lehet persze, hogy nem 
mindent, mi mindenesetre nem 
tudunk újabb szempontokat föl- 
sorolni. Maradéktalanul ugyan 
nem értünk egyet egyik véle- 
ménnyel sem, de ezzel mégsem 
akarjuk untatni az olvasót.) 
Egész másért hoztuk szóba 
e havi mellékletünk cím- 
oldalán ezt a témát. 
Régi mániánk jutott eszünkbe 
az ügy kapcsán. A tanácsadói 
szakma hiánya kis hazánkban. 
Vannak ugyan akik ilyesféle 
tanácsadónak nevezik magukat. Az általános tapasztalat 
azonban az, hogy ezek az önjelölt szakemberek mégha nem is 
rossz szakemberek, egy-egy cég elkötelezett hívei, sőt gyak- 
ran munkakönyves vagy csak jól fizetett munkatársai. Mert 
mi lenne, mi a dolga a világ fejlettebb országaiban az ilyen, 
úgynevezett tanácsadóknak ? Van egy cég, amely elhatározza, 
hogy gépet, gépeket vesz. Tudja, hogy mi a saját cége dolga, 
van is valamilyen elképzelése arról, hogy mindezt, hogyan 
lehetne gépesíteni, nem ismeri azonban — minthogy nem is 
dolga, nem is szakmája - a számítógépes piacot. Fölkeres 
tehát egy független tanácsadói irodát és tanácsot kér. Ta- 
nácsot arra vonatkozóan, hogy az adott cég adott feladatait 
milyen gépekkel lehetne leghatékonyabban és leggazdaságo- 
sabban végrehajtatni. A tanácsadó természetesen a tanács 
adásakor nemcsak a számításba jöhető gépek tudását, me- 
móriakapacitását, perifériát kell, hogy figyelembe vegye, 
hanem a szükséges szoftverhátteret, azok árát, a különleges 
igényeket stb. Egyszóval nagyon sokféle szempontot. 
Mondhatnák a kedves olvasók, hogy de hiszen az IBM kom- 
patíbilis gépeknél ezek a dolgok azonosak. Igaz is meg nem is. 


§ (Ha teljesen elmerülnénk benne, sohasem érnénk a végére) 


[321 Atari nyerő -— ez meg egy új pályázat a Skála jóvoltából. 


BELÜLRŐL 


Programajánlat — 15-ös játék HT-re 
Programajánlat — Primo stopper óriás számjegyekkel 


mostanra újabbal egészültek ki! 
MIKRO MEN — Hogy mi ez, megtudhatják, ha odalapoznak 


Tudunk olyan IBM kompa- 
tíbilis gépről például, amelyen 
még nem láttunk magyar 
ékezetes szövegszerkesztőt, 
holott a gépek többségére 
ilyet már kifejlesztettek. 
A kompatibilitás mértéke mint 
tudjuk különböző. Azután az 
sem mindegy, hogy egy adott 
szoftvert az egyik cégnél 
50 000-ért, egy másiknál egy 
másik kompatíbilis gépre 
ugyanezt 10001 i 
A két szoftver között persze 
nem sok a különbség, még az is 
előfordul, hogy mindkettő 
ugyanannak a nyugati termék- 
nek a magyarított, lopott 
változata. Az áruk közt azon- 
ban... Ilyen esetben a tanács- 
adó kutya kötelessége lenne 
az ilyen eltérésekre fölhívni 
a vevő figyelmét, tudva azt, 
hogy az adott szoftver a vevő 
érdeklődési körébe 
tartozhat. 
Nyilvánvaló tehát, hogy egy 
ilyen tanácsadói iroda, testület 
akkor tölthetné be szerepét, 
ha a gyártóktól, eladóktól 
független lenne. 
Márpedig egy ilyen cég föl- 
állításához, működtetéséhez pénz kellene. Pénz és nem is 
kevés pénz. (Az már más dolog, hogy megfelelő sikeres mű- 
ködés esetén egy ilyen cég előbb-utóbb nyereségessé is 
válhatna.) 
Az az eretnek gondolat jutott az eszembe, hogy ha már ilyen 
tökéletes kondíciókat teremtett a hazai gazdaságirányítás 
néhány cég számára az IBM kompatíbilis gépek terjesztéséhez, 
nem kötelezhette volna-e ugyanezeket a cégeket egy ilyen 
tanácsadói szolgálat közös tőkéből való felállítására. Ily- 
módon ugyanis garantálni lehetett volna, hogy a tánácsadó 
cég egyik félnek sem lekötelezettebb a másiknál. Mindezt 
csak feltételes módban írhatjuk le. Tanácsadói iroda létre- 
hozásának eddig ugyanis még a gondolata sem vetődött fel. 
Márpedig a gépet, szoftvert gyártók illetve árulók közti 
verseny igazából csak akkor jöhetne létre, ha a potenciális 
vásárlóknak is megadatna az esély a vásárlás előtti reális tá- 
jékozódásra, a kínálatok közti elfigazodásra. Ma, szervezett 
tanácsadói apparátus nélkül ez vagy csak álom, vagy ötször 
annyiba kerül a tájékozódni akarónak. S ehhez nem kap hitelt, 
vagy állami támogatást senki. Angyalosi László 


9 Ge) 


Hiroldal — amelyben megnézhetik maguknak a Commodore Amiga legújabb változatát, a 2000-est 
Első kézből a tv computerről — a beépített rutinok közül most a billentyűzetkezelőkkel ismerkedhetnek 


Backtrack - egy programozási módszer rejtelmeibe vezettetünk be 
Mi az a borona? — azon kívül, hogy egy mezőgazdasági szerszám. megtudhatják 
Széljegyzet a BETA BASIC hibáihoz — a hibák, amelyeket a múlt havi számban közzétettünk, 


SORVEZETŐ — egy régi rovat új köntösben, új tartalommal, változatlan alapkoncepcióval — hogy segítsünk a szakköröknek! 
Könyvmoly — megrágcsálta az információgazdaságról készült tanulmánykötet mind a 234 lapját 

Posta — amelyben egy olvasónknak elmondjuk, hogy mi az a GEOS, mire és hogyan lehet használni 

Plus/4 nyerő 2. feladat megoldása — egy nagyon bonyolult feladat megoldása hiányosan. 
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BILLENTYŰZET A 


RUTINOK 


A beépített rutinok leírását a billentyűzetkezelővel folytatjuk. 
A billentyűzet, valamint a beépített és a külső botkormányok leolvasá- 
sát végzik. A használt rendszerváltozók a következők: 


PICTURE 70 byte, címe 2897-OBS5S1h 

A billentyűzetmátrix utoljára leolvasott értéke (lásd 1. táblázat) 
OLDPICTURE 170 byte, címe 2907-08B5Bh 

A billentyűzetmátrix előzőleg leolvasott értéke 

DELAY KEY 7 byte, címe 2917-0B65h 

Az automatikus billentyűzetismétlés kezdetéhez szükséges idő 20 
ms-os egységben. BASIC-ből a SET DELAY állítja. 

LOCK KEY 7 byte, címe 2918-0866h 

Az aktuális kurzor (LOCK) állapotát mutatja: 

0 normál karakterek (LOCK, normál kurzor) 

17 nagybetűk (LOCK-HCTRL, inverz C kurzor) 

2 folyamatos shift (LOCK SHIFT, inverz S kurzor) 

8 alternatív karakterek (LOCK-ALT, inverz A kurzor) 

RATE KEY 17 byte, címe 2919-0867h 

Automatikus billentyűismétlés alatt a két karakter megjelenése előtti 
időt adja 20 ms-os egységben. BASIC-ből a SET RATE állítja. 
HOLD DIS 7 byte, címe 2920-0B68h 

Jelzi, hogy a CTRL4P együttes lenyomásával felfüggeszthető-e a 
rendszer működése. (Pl. listázás félbeszakítható) 

0 HOLD-mód engedélyezve 

255 HOLD-mód tiltva 


z z 
A rutinok leírása: 
KBD IRO hívási kód: 144 (90h) 
működés: A billentyűzetmátrix leolvasását végzi, 
Felhasználói programból nem ajánlott hívni. 
KBD CHIN hívási kód: 145 (91h) 
output: Czskarakter vagy botkormány kódja 
A-hibakód 
működés: A billentyűzeten leütött karakter, vagy a botkormány el- 
mozdításának kódját adja. Megvárja, amíg érkezik kód. 
KBD STATUS hívási kód: 147 (93h) 
output: C-jelző 
0 nincs beolvasható karakter 
255 beolvasható karakter 
működés: A billentyűzet, iil. botkormányok státusát adja 


A billentyűzet közvetlen leolvasása 
A billentyűzet, ill. botkormányok közvetlen leolvasására is szükség 
lehet egyes programokban. 
Az 17. táblázat megadja a billentyűzetmátrixot. Ennek leolvasásához 
először ki kell választani a mátrix megfelelő sorát (0-9), és ezt a 
3. portra az alsó 4 biten kiküldeni. A beolvasás az 58h portról tör- 
ténik. Az a billentyű volt éppen lenyomva, amelyikhez tartozó bit 
értéke zérus. 
A 3. port egyéb bitjeinek is van jelentése, ezért a sorkiválasztást az 
utoljára kiküldött byte alsó 4 bitje helyébe kell írni, és úgy kiküldeni. 
A megfelelő rendszerváltozó: 
PORTO3 7 byte, címe 2833-OBT1h 
bit7, bit6: bővítőkártya kiválasztás 
bit3-bitO: billentyűzetmátrix sorkiválasztás 
Pl. ahhoz, hogy a RETURN billentyű le van-e nyomva, az 1. táblázat 
alapján az 5. sor 4. bitjét kell vizsgálni. Ezt a vizsgálatot végzi el az 
1. program gépi kódú rutinja. Ha visszatéréskor a ZERO FLAG-O, 
akkor igen, egyébként pedig nem volt a RETURN lenyomva. 

Cseh Tibor 
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1.táblázat: Billentyüzet-mátrix a TV-Computeren. 


" ( , 
d P ú C fej o Í ] 
FROPBEKÉSÍT dans ásta össáss ss ístariós ls és árt kek ön ÁL E korékááő ad élén Vh áő SZ TGSÉ BET 
11 ; : 
tr Va A A fi H AV s D G 
SEL E Ülfeiszétsekésítsészenű elezeáltszsze tételezze tő értette tee ese ET 
5 34 J É ÜŰ RET Á L K DEL 
százas dear z szek llle ete same ee eeázaeest ee sees élsz EST 
6 áfv Y LOCK N SH X [oj B 
v EGT: 3- ARS - "SP CTRL ESC 4. ALT 
ell ss VTÉSNÁTNNEKÉSE SE SET VÉKA ÉÉNE DEE SÉÉÉSE MAST o tő 7. 
W. sát RJIL RJR RJA RJF RJD RJU INS 
CSEL ÉNÉSY árás é d éáseáélátkezáteááetaeráláe es aelészászls SET 
já LJE LJRó LJA! LIK  ÚIJD. LIU 


SH SHIFT 

t RIL balra N 

t RJR jobbra : beépített (") és 
RJA gyorsítás vagy 2.tüz : jobboldali külsö 
RJF : tüz ; botkormány 

: RJD : le [ 

z RJU : 61 / 
LIL balra h 
LJR jobbra a 
LJA : gyorsítás vagy 2.tüz ; baloldali külsö 
JF : tüz ; botkormány 
LJD : le , 
LJU föl / 


10 ! 
tej zetett ee ér ék ÉT A Ea űj 1.program 
30 ! ! 
40 ! TV-COMPUTER ! 
50 ! ! 
60 ! RETURN billentyü figyelése ! 
70 1 a billentyüzet-mátrixon 1 
80 ! fi 
fi 


PORTOZ3 EOU OB11h 


3A 11 OB LD A , (PORTO3) 
OFOh 

F6 05 OR 5 

327 11 0B LD (PORTO3) , A 
(3) ,A 
A,(58h) 
4,A 


15.sor 


0000c€ 


( 
j u 
Ti 
5 


:4.bit 


IREK KE CEC ÉTETOET ETET VETETT 
UDWNKODVONWON 


00000 


Egy hasznos segédprogram: APPEN 


Korábban már ismertettük a MERGE- 


eljárást programok  összefésülésére. 
Az ott bemutatott módon tetszőleges 
programot be tudunk illeszteni a me- 
móriában levő programunkba. Csupán 
egy apró kényelmetlenséggel jár a 
dolog: a beszúrandó programból lista 
file-t kell készíteni, és ezt kell szalag- 
ról leolvasni. Némi programozási ,,ál- 
dozattal" gyorsabb és egyszerűbb 
megoldást biztosít a 2. program. A 
listából csupán az 1. és 2. sort kell 
begépelni, a többi sor csak a működés 
könnyebb megértése miatt szerepel. 


Az említett programozási áldozat a 
következő: a programokat úgy kell 
megírni, hogy az egyes részeknek kü- 
lönböző tartományba essenek a sor- 
számai. Pl. a főprogram sorszámai 
100-999 tartományba esnek, a hoz- 
zá tartozó külön megírt szubrutinok pl. 
az 1000-1999, 2000—-2999 stb. tar- 
tományt használják. Lényeges, hogy 
ne legyen átfedés! A használt leg- 
kisebb sorszám a 3 lehet, mert az első 
két sorban van az APPEND progra- 


sorszámok szerint növekvő sorrend- 
ben! 

Először betöltjük az APPEND progra- 
mot és elindítjuk: 

RUN 


Az 17. ábra szerinti képet fogjuk látni, 
a kurzor a 3. sor elején villog. Két 
RETURN után a kurzor a 7. sorban 
levő LOAD elején villog. Ha szüksé- 
ges, beírhatjuk a LDODAD mögé idéző- 
jelek között a betöltendő program 
nevét. Újabb RETURN-re a gép ki- 
írja: 

Searching 

Most kell a legkisebb sorszámokat 
tartalmazó programrészletet betölteni. 
Legyen ez pl. a , FŐPROGRAM" ne- 
vű. Ha a betöltés kész (2. ábra), 
nyomjunk meg néhány RETURN-t, 
amíg az alul levő sorokat is végrehajtja 
a BASIC (3. ábra). Most újabb RUN 
paranccsal kezdve ismétlés, amíg nö- 
vekvő sorszámok szerint az utolsó 
programrészletet is be nem olvastuk. 
Ezután kitöröljük az APPEND prog- 
ramot: 


és kimenthetjük SAVE paranccsal az 
összefűzött egész programot. 


A program működési elve 
a 2. program listájában szereplő rövid 
gépi kódú program megkeresi az ak- 
tuális BASIC programunk végét. A 
BASIC program kezdőcímét a TEXT 
rendszerváltozó tartalmazza (címe 
5922-1722h). Az első két POKE uta- 
sítás átállítja a TEXT változót, így az a 
programunk végére fog mutatni. Eny- 
nyi azonban nem elég a betöltés előtt, 
mert a LOAD vagy NEW utasítás ha- 
tására a TEXT változóba beíródik a 
BASIC számára használható legkisebb 
cím. Ezt állítja ugyancsak a program 
végére a második két POKE. Az emlí- 
tett rendszerváltozó a VLOMEM (címe 
5920-1720h). Ezek után a BASIC 
már , nem látja" az APPEND progra- 
mot, a betöltött új program fizikailag 
mégis ennek folytatásaként kerül a 
memóriába. A harmadik két POKE 
visszaállítja VLOMEM-et, a negyedik 
kettő pedig a TEXT-et az eredeti prog- 
ramkezdetre. Újabb RUN-ra az eljárás 


munk. Ezek után jöhet az összefűzés, . DELETE-2 ismételhető. Cs. T. 
EEszöttes eTŐTE: . 
Me A EPE ENEK TT 
2 3 ] poke5s92e, 97 :pokeSS21, 27 
2.program [hoag 
/ : § ; 
4 As$z"":FORI-1TO13:READB:A$zA$8CHR$( B) : NEXT : TEUSR( 2--VARPTR(A$ / 
) ) : TH-INT(T/256) : TL-T-256"TH : RCL-PEEK ( 5922 ) : RCH-PEEK ( 5923) : GRAPH 
ICS4:PRINT" "Betöltés elött:":PRINT:PRINT"poke5922 , " ; TL ; " : poke592 ! 
3," ; TH:PRINT:PRINT"poke5920 , "; TL;":poke5921, "; TH ; 
HH2 PRINT:PRINT"1load":PRINTAT18,1:"tBetöltés után:":PRINT"pokeS köetöltés után:  sozi. 25 
320 , " ; ROL ; " : poke5921 , " ; RCH : PRINT : PRINT"poke5922 , " ; RCL ; " :pokes923I Po (9 9P s TT TP ODBB : 
JERRGHSSRENDÁT 2 d E ÉSENOSDAGÁGZ ST 28 LG, 167200 MOS ÚT 48 Za po 922, 239 :pokes5923, 25 a 
3,26,24,246 3 7 § L .. "ás a] 
[ZO st se sa A dont sa VÉ ) EBFTSTTE7ETSTTT——— — 
30 [3 ; f ! 2kes922, 97 :pokes5923, 27 
40 1 TV-COMPUTER ij ! ajozázázászzási 97 :poke5921, 27 
501 ! j jvssa 
60 ! BASIC programok összefüzése ! ( Be2aína? FŐPROGRAN 
SZT ( APPEND ) ! kezznástésti 7 1 
BO! ! ja] 
90 1-—-——-—— -I ! ! 
1100 ! 1 ! 
350 h. A használt gépi kódú rutin: ; ( Pokes928; 239" ipokesozi, 25 ,] 
130 ! SAZZZN NT EKT EGU S Ü222N S BrÓSLAN eleje lit 922: 239 :pokes923, 25 §j 
vá4o ! B j all! 
150 ! 42,34/23 DAZZZAZ LD HL (TEXT) ezsezret ENTER ÚNAESESSTBE ESÉS 
1601 LOOP: eszed ásáá ük ] 
170 ! 126 7E LD A, (HL) ] Hnesszet 97 upie kás BSi sé ] 
180 ! 167 A7 AND A ] —apzizásésg 97 :poke5921., 27 Í 
190 ! 200 ce RETSSZI program vége jjjesan ! 
200. 1139 85 ADD AL earching d ! 
210 ! 111 6F LD L,A Si e. FÖPROGRAIT j 
220 ! 48,249 30 F9 JR — NZ,LOOP 0 j 
230 ! 36 24 INC H í] 
240 ! 24,246 18 F6 JR — LOOP 1] ! 
! 


kBetöltés után: 
! s 


:poke5921., 25 


3.ábra 


oke5928, 

k 

Ét 239 :poke5923, 25 
k 
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10 
15 
20 
1A 


el 
5. :SET(935XIEN 
60 Axz"128131143179 PITAO1BB176" :FORXEITOLEN (Ar) STEPZ: B: ( (X— 


80 
pe 


190 FORX-ITOISZÁAS(XIZÁR(X) AT 
110 YS3254FIX(X/4-,1)x1284(X-FIX(XZ4-.1)kA)xBS PRINTÉYvAS(X); 


VAA A EBERT EE EE EE E Feet beke -E e 
shh 15-OS JATEK det 


74r KESZI ETTES PETROV FERENC $-t 
, BERELEEEBEEEEE EHET EE EE EE EE EHE 


Egy ősrégi játék. Megvalósítása programozástech- 


nikailag 
érdekes. 


is szellemes. A játék maga pedig máig 


Használatához való információkat megadja a prog- 


ram. 


Eeépítése: E) 


60-50 


150-220 
230—240 


Keret 

0-9 a nagyméretű számok előállítása 

A $(0)-Á $(9)-be. 

(Azt használja föl, hogy a számok csak 
9 féle karakterből állnak.) 

Ugyanez 10-15-ig. 

A számok elé szóközök, A(X.0)-az X szám 
helye a képernyőn A(X,1)-az A(X,0) he- 
lyen lévő szám. 

D $-ban a jó sorrend. 

Összekeverés 

Főprogram. Benyomott betűt hasonlítja 
nyilakkal, ettől függően a négy irányító 
rutinra ugrás. Ha B $ egyenlő D $-ral, akkor 
össze van rakva GOTO 230 

(B$ az állásnak megfelelően változik az 
irányító rutinokban.) 

Irányító rutinok. 

"ÚJRA?" 


Móricz Zsigmond Gimnázium szakköre - Tiszakécske 


CLEAR 1000: DEFINTA-Z:DIMAX(16) FÁ(l6v1) :CLS 


FORXEZSTÖ9Z:SET( 113): TSET(X40) 2 


XT 


4sXv3))) :NEXT 


NEXT YrX 
FORXSIOTOLSFASR(XY SÁR (1) k" 


SzBz-HCHRS (XI) :NEXT: BazEatCHRs(16) :DszEx 


129 
130 


tov" 


140 


An(16)z 

PRINTÉG s "ÖSSZEKEVEREM ! 
SZAMOK BETOLAÁSA AZ UF 
ASZÍNKEYZSON ABRS((A 


BI70715072102190:IFESZZERTHENZ3GELSEI40 


150 


TFX?4THENA(Xr12-A(X—ári) :ERINTE 


ArAr4rOl ráz (16): 


"ACHRSE(2OYHSTRINGE (87 


EXT: EGES 137040: :SETC249x. 


a Azz"65647407600455643355633460611465533460043455600465643 
RYS1TOG:ÁS(XIZASCXIPEBS(VALCMIDS(AtyXxGTYP1))): IFY5S3THENAS (XI 
INGE(Z 24) 


MA)aT 


:SET(259XI:SET(92yX 


19/3) -UHRH(VAL(MIDA( 


61 147: FORXSOTO9:F 
zAn(K) HÜHRE(26YASTR 


"ADHRAC27) TAZKVAL. ERIGHTE (STRA(CX3 91229 5NEXT 
7": TFXCIOTHENÁAS(X)zT 


"4As(X) § 
TAC(XYOJSZYSA(Xr 1) 5XIB 


"sósi6:A(ArR)z74i:Xszi1ó 


":FORUSÍTOZOOTONRNII(4) GOSUBÍ7O "1587 21071905NEXT: ERINT 
S HELYRE A NYILAKKAL 
"is (AsztHRS(10)) x24(ASZCHRA(BI) sZ (Aszt HRA (2?) x4) GOSU 


1 


PRINTÉR(X SO) rAHAA(Xmár] ga 


szt EFTA(BsyXcH) tUHRSE(16GYTMINR(Br 5 X—3r ő? PIUS (BryX—4r 1) FRIGHTA(Brs16— XI: X:X-b4 


160 
170 


RETURN 
IF XCI3THENA(Xr1D-A(Xtáz 


19 :PRINTEA(XtápPO) FÁS(1GZFEPRINTÉEA(Xr 9) FAS (A(Xt4r1)); 


"BosLEFTS(BsrX—-IDtMIDE(BssXtári) eMIUS(EssXti s 39 FÜHRS(1l6)tRIGHTS(Busi2ex? £XzXt4 


189 
199 
02, 
290 


KETUKN 
TECX-1)/Z4XKDINT((X—-I3/ZADT 

AS(Á(X-rilr1)d s: BszLEFTS(RBeiyXer 
RETURN 


A(Xy1)zA(X—19 19 :"PRINTRA(X-irO) An (16); 
29 1EHRs(169-MIDA(BHsX- 


:SERINTÉA(Xr 
1517 tKRIGHTA(B4r16-X):XsxX-ri 


210 IF(XZ4C)INTC(XZ4) I THENALXri9srÁA(XP1Lvi? FPRINTÉA(XtirOZrAS (16) i: FR INTÉA(X50) rAn( 


ACX 
220 
230 


űl EGYET jé 


tlr1)); 
KETURN 
FRINTÉO s "VÉGKE 

vedte Bé 


SIKERÜLT OSSZERA 


KNON 


EBSZLEF TEL Hex 19rMIDS(BeyXt171)FOHRS(16)SRIGHTE(Berl§jeXxIrXz 


THENZ240 


Xt1 


"öZ:ERINTÉGAv JATSZOL ME 
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Közkedvelt programozási feladat a stopper készítése — alapváltozatát már a 
kezdők is kipróbálják. A most közölt megoldás magasabb igényeket is kielégít: 
pontosabb a szokásos BASIC-időzítésnél, a számjegyek pedig a normál karakter 
sokszorosai, megjelenítésük a lehető leggyorsabb képváltással történik. 

Ezt természetesen gépi kódú szubrutinokkal oldottam meg, amelyek a maguk 
nemében nagyon egyszerűek. Tanulók számára éppen arra lehetnek bátorító 
példák, hogy látszólag bonyolult feladatok is meglepően leegyszerűsíthetők. 
Az időmérő (tulajdonképpen késleltető) szubrutin tized másodpercet mér. 
Mivel a kijelzés egész másodperces, erre csak azért van szükség, hogy a leállító 
billentyűnyomásra azonnal reagáljon a gép. teljesebb legyen az illúzió. A szub- 
rutin assembler alakja: 
JET "Zn ER ÖZ időmérés finom szabályozása a CFH (207) érték 

sé módosításával végezhető el. 


HESS "A számjegyek rajzát a következőképpen állítjuk elő. 
HR E A ROM 12791-es címétől kezdve található a karakterek 


kódolt mintázata 8-8 byte-on (az A típusjelű gépeken 
a 30-as, a B jelűeken a 26-os ASCII kódtól kezdve 
készült a táblázat). Bonyolult és lassú lenne minden 
egyes számjegyrajzoláshoz innen dekódolni és megjeleníteni. Ehelyett csak 
egyszer végeztetjük el a dekódolást a program előkészítő részében: a szám- 
jegyek adatait célszerű formában átmásoltatjuk egy szabad tárolóterületre. 
Minden számjegy 7x5 pontos mátrixban jelenik meg — az új tárolás viszont úgy 
történik, hogy a számjegy adatai 35 byte-on helyezkedjenek el (az eredeti 0-s 
bit 0-s értékű byte-ot, az 1-es bit 255-ös értékű byte-ot hoz létre). Az átkódo- 
g terjedő programrész végzi. 
A számjegyek váltásakor ezt a 35 byte-ot másolja át 
egy gépi kódú szubrutin a képernyőre 12-szeres 
nagyítással, így a méret végül 40x84 képernyőpont 
Jesz. A másolóprogram assembler listája: 
JA program közvetlenül vesz át adatokat a ROM-ból, 
ezért gondoskodni kell az A és B típus felismeréséről. 
Ennek egyik lehetséges megoldása a 3030-as sor. 
Ez JArra is szükség van, hogy a program alkalmazkodjék 
az eltérő memóriaméretű gépekhez, mert a gépi kódú 
" rajzolónak ismernie kell a képernyő-RAM címét. Ezt 
zak a PEEK(20) közvetlenül jelzi. 
érv "A módszertani tanulságokon túl jó szolgálatot i$ tehet 
Ha Ja program: nagyobb közönség előtt rendezett vetélke- 
; dőkön, játékokon időmérésre használhatjuk. 
Fekete Győrgy 7300 Komló, Bocskai u. 35. 


3 


HZ S EBH 


"wall 


EDE e 


PRIMO 
stopper óriás számjegyekkel 


REM HETRE TETEJE JE JE TE ME JE TEJE JE TE TE E JEE JE JEE JE AE 9E 
REMát PRIMO 8 TA FP,P R 4 


REM FEE JE JEE SE EE TE 3E EE JE JE JE JE JEE JEE TE E TE EHE 9E EE EE 
GOSUB 3010: REM ELOKESZIÍTES, FELIRAT 
REM MUKODT 


G,L:E CALL(F,A(D)) 
G,M: EESCALL(F,A(D)) 


BEEP 1,1: TO 9 


ALL (PF IF INKE —5 "THEN 210 
NEXT: NEXT: NEXT: NEXT: NEXT 
REM MEGALLITAS, FOLYTATAS 
" 200,100 
Y$ 
0" THEN GOSUR 1010: GOTO 110 
4" THEN BEEP 20,20: GOTO 190 
THEN 2 
ES 
£(R2 1285 OUT O,FEEK(R) 


FOKE T zási CLS: END 
REM KAMERA E TETEJE TEJE E TEJE JEE 9 
REM NULLAZAS 
FPOKE G,J: GOSUB 
FOKE G,K: GOSUB 
POKE G,L: GOSUB 
FOKE G9M: GOSUB 2010: BEEF 
FOR A-O TO 10: BEEF 10,40 
BEEF 40910: NEXT: RETURN 
2000 REM A NULLA IRATASA 
2010 EzCALL(F,A(0)): RETURN 
3000 REM FELIRAT, 
3010 DEFINT A-T: 
3020 F-16476: P-17000: 
3 D-12935: IF FEEK(D)z 
B5D4EXB: AzPEE 


3040 
3050 B.B B e R": Z 


20107 
2010: 
2010: 


BEEF 500,10 
BEEP c 
BEEP 


1060 


ELOKESZIÍTES, ADATOK 
DEFSTR YiZz 
CsFP410 
kost THEN E-4 


CLS 


FRINTE 
PRINT$ 


7 ERINTS Ed 2; 


FRINT$ INDUL -: MEGALL" 
PRINT$ 13,2,": VEGE Os: NULLAZ" 
PRINT$ 14, l6,"ar FOLYTATJA"CHR$ (1) 
zzsgs FOR D-O TO 9: A(D)- 

FOR Es6 TŰ 2 STEP ís H E 


BEEF D,E: FOR Nz1i TO 7: MEPEEK(EtGN) 
IFM AND H THEN FOKEC,K ELSE FOKEC,O 
C-C-ti: NEXT: NEXT: BZB4B: NEXT 

PAZ SZOZ SZET : 

01: REM 


öt ő] 
209,19,13, ESSZÉT Si 5525 
Z230,201: REM SZAMJEGYRAJZOLO 

3180 J-1: Ks9: LE18: M-2ó: P-1644Z 

3190 FOKE R,PEEK(R) AND 127:. TERt11 

3200 FOKE T,1l: GOSUB 1010: RETURN 
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egy programozási módszer: 


A személyi számítógépek rohamos el- 
terjedésével egyre több diák és felnőtt 
jut gépközelbe az iskolában, családban 
vagy a munkahelyen, és lázasan tanul 
programozni. Ez többnyire azt jelenti, 
hogy ismerkedik az adott gép BASIC 
utasításaival, arra törekedve, hogy mi- 
nél több és furfangosabb utasítás váljon 
ismertté számára. Mint ahogy nem ál- 
líthatjuk, hogy valaki tud sakkozni, ha 
ismeri a játék szabályait, ugyanúgy nem 
biztos, hogy , tud" programozni az, aki 
elég sok BASIC utasítást ismer. 


Néhánypéldán keresztül megpróbálunk 
bemutatni egy programozási mód- 
szert, amely többnyire nem igényel 
bonyolult utasításokat, csak némi öt- 
letességet. A mellékelt programok 
Commodore—-16-os gépre készültek, 
de könnyen átírhatók bármely más 
géptípusra is. 

Az általános iskolai tanulók számára 
kiírt egyéni pályázat matematikai fel- 
adatai között szerepel az alábbi: 

5 radírt, 4 ceruzát és 3 tollat vásárol- 
tunk összesen 100 forintért. 1 radír 
kevesebbe, 1 toll pedig többe kerül, 
mint 1 ceruza. Mindegyiknek egész 
forint az ára. Mennyibe kerülhet külön - 


külön 1 radír, 1 ceruza és 1 toll? 
(1985/86. tanév, I. forduló, 3. fel- 
adat.) 


Legyen a radír ára x, a ceruzáé y, a 
tollé z. A feladat szerint olyan x, y, z 
számhármasokat kell keresnünk, 
amelyre 5xt4y-t32-100, ahol x, y, z 
pozitív egész, és xcy-z. 

Először ki fogunk választani egy meg- 
felelő x értéket, ehhez egy megfelelő 
y-t, végül z-t. 

x kiválasztásakor 1-gyel kezdve min- 
den pozitív egész szám szóba jöhet 
addig, amíg nem lesz az 5xt4(xt1)- 
13(xt2) kifejezés értéke 100-nál 
nagyobb. (Itt használtuk ki az x-—y-z 
feltételt.) 


Valamelyik x értéket kiválasztva lé- 
nyegében elindultunk egy , úton", 
amelyen y kiválasztása újabb , ,útel- 
ágazást" jelent, ahol a továbbhaladás- 
hoz ismét választunk egy ,. utat". Itt 
az elágazások száma már x értékétől is 
függ. y lehetséges értékei az x-nél 
nagyobb, és az 5xt4y-t3(yt1) c100 
feltételnek eleget tevő pozitív egész 
számok. 

z-tisyt1-gyel kezdve növeljük egye- 
sével addig, amíg 5x-t4y-t3z éppen 
100 lesz — azaz megkapunk egy meg- 
oldást —, vagy meghaladja a 100-at, 
ekkor visszalépünk, és vesszük a kö- 
vetkező y értéket. Ha egy adott x ér- 
:tékhez tartozó minden y értéket meg- 
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vizsgáltunk, akkor ismét visszalépünk 
(még eggyel alacsonyabb szintre), és 
vesszük a következő lehetséges x ér- 
téket, hozzá y-,t majd Z-t stb. 


A visszalépésről kapta a módszer a 
nevét. (Backtrack — visszalép, vissza- 
táncol.) Ehelyett nevezhetnénk ezt az 
eljárást módszeres próbálgatásnak is. 


Mindezt i. gy realizálhatjuk egy prograraban K 


jeti 


er TT 
His 


86 


€ 


1 


Figyeljük meg, hogy ez a rövid prog- 
ram milyen kevés BASIC utasítást 
használ. Kétségkívül fel lehetne — sőt 
fel is kell — , cicomázni" a programot 
(áttekinthetőbb kiírás, megoldások 
számolása stb.), de ez a program lé- 
nyegét nem érinti. 

A probléma megoldásának természe- 
tesen nem ez az egyetlen útja. Pl. x 
és y ismeretében az 5xt4y--32-100 
egyenletből z már kiszámítható, de 
ekkor azt kellene vizsgálnunk, hogy 
z egész szám-e. 


Az egész csokoládénak 


mekkora részét ehette se efa saő ela Cili és e Dénész 


E: hm Ms ari SEzHÖR 


THEH 7 
HE THEM 58 


Ebben a feladatban is pozitív egész. 
számokat keresünk, melyekre teljesül- 
nek az 


(Ppeti esláoi ÚRBAN) 


FEALÁT AT SÁLAT Ég T ésa 
azbscszd 
feltételek. 


TIDPBKÜXEEDZLAR THEM EHO § ] 
verde ke velő siéő THEM ZA 


HEH 
HEM öl ] 


Ugyancsak általános iskolai matema- 
tikai versenyfeladat (egyéni pályázat 
1984/85. tanév, II. forduló, A/4 fel- 
adat) a következő: 

Ági, Béla, Cili és Dénes testvérek. 
Születésük sorrendje megegyezik a 
leírt sorrenddel. Egy tábla csokit úgy 
osztottak el egymás között, hogy 
egyik sem evett többet, mint a nála 
fiatalabb. Mindegyikük csokoládéja az 
egész csokinak olyan törttel kifejez- 
hető része, amelyiknek a számlálója 1 
és a nevezője egész szám. 


THEH 118 ] 
: THEM FŐ : 


(Ági csokoládérésze ük Béláé —- stb.) 


d" 
A mellékelt program ugyanésak a 
backtrack elvén működik. 
Pl. c legelső kipróbált értéke b. Ha még 


—37—31—z 1, akkorc-ttovább kell nö- 
á .D  6 


s FSB LES KELEK Ál 
velnünk, de ha máz gt g -1, 


o 


a. 


FELIRAT , TABLA gi 


jö ztzE ts 


MEN ak VEGY 1; 


HEH 


THE 
THEN 


! 
! 
! 
! 


túlhaladtunk a 


c-vel 
felelő értéken, így vissza kell lépnünk 


akkor meg- 
b növelésére. Ezeket a feltételeket 
azonban nem vizsgálhatjuk ebben a 
formában, közös nevezőre hozással át 
kell írnunk őket úgy, hogy a vizsgált 
egyenlőtlenségekben egész számok 
szerepeljenek. 


Próbáljuk átírni a programot arra az 
esetre, ha öt testvérnek kell osztoznia 
a csokoládén, ugyanilyen feltételek 
mellett. 

Ebből már kitűnne a backtrack mód- 
szer hátránya is. Ha ugyanis nagyon 
sok esetet kell megvizsgálni, akkor ez 
még a gép számára is sokáig tarthat. 
Pl. öt testvér esetén az első megoldás 


e 


ákos zos ges áz 7 


ii 


iz 
AE ELT afegtezkeate ág je age ab ze de 
Ft KVETKEZÜ 
KONETK 


Z OSZLÜP NEGET? 


BEGESÁSST ÓÓ 
ideg ti 


etztetztetetete 8 


kettesek SRESE ESK SERT KREOL SENNA ZRET MENO SANT [/ 


mee zx 


OSZLÜBÜT 4 ] 
EZO HEZOTAEGE 


Ha 


slla ZÁédbs e lesse 

2 Vg 43! 18067 7 

és ez több mint egy perc futásidő után 
derül ki. 


Sokat javíthatunk a program sebessé- 
gén, ha úgy írjuk meg a programot, 
hogy a gép mielőbb ismerje fel, hogy 
a vizsgált út nem hoz eredményt. Pl. 
itt az első négy szám ismeretében ki 
lehet számolni, hogy az ötödiket mi- 
lyen szám közelében kell keresnünk. 
Ezzel viszont bonyolultabbá válik a 
program. 


A backtrack módszer illusztrálására 
klasszikusnak számító feladat a kö- 
vetkező: 


Helyezzünk el a sakktáblán nyolc ve- 
zért úgy, hogy azok ne üssék egymást. 
Keressük meg az összes megoldást. 
Figyeljük meg a mellékelt program- 
ban, hogy egy figura letevésekor vagy 
visszavételekor ugyanaz a szubrutin 
használható (420—520), csak míg a 
letevéskor (300) minden foglalttá 
váló mező , súlyát" 1-gyel növeljük, 
addig a felvételkor (400) 1-gyel csök- 
kentjük. Így a program számontartja. 
hogy az adott mező hányszorosan fog- 
lalt. Ha ez a szám O, akkor szabad [le- 
tenni egy figurát. 


Végezetül álljon itt egy probléma, 
melynek a megoldásához jól használ- 
ható a backtrack módszer: 


Válasszunk ki az 1 és n közötti termé- 
szetes számok közül minél többet úgy, 
hogy bármely kettőnek a különbsége 
ne legyen egyenlő bármely másik 
kettő különbségével. Pl. n-12 ese- 
tén kiválasztható öt ilyen szám: 1, 2. 
5, 10, 12. Van-e másik öt ilyen szám? 
Ki lehet-e választani hatot? Ha nem, 
milyen n esetén választható ki hat 
(hét, nyolc stb.) ilyen szám? 


A probléma megoldásához sok sikert 
kíván 


Szilassi Lajos Szeged, Bite Pál u. 2/b 


A cikk példái talán nem tűntek eléggé 
meggyőzőnek. Bizonyára van olyan ol- 
vasó, aki ezek alapján nem látta be a 
backtrack módszer hasznosságát. 

Igaz, hogy az első példában bemutatott 
egyenlőségfajta megoldására létezik ha- 
tékony algoritmus. Gyorsabb, mint a 
backtrack - de ha ezt használjuk, a szá- 
mítógépes program már korántsem lesz 
ilyen egyszerű és áttekinthető. Igaz azis, 
hogy egy kis előzetes gondolkodás után 
a második feladat is megoldható ügye- 
sebben; azonban ezt is csak a program 
egyszerűségének rovására tehetjük 
meg. 


A backtrack lényegét igazán a harmadik 
példa mutatja meg. Ezt a feladatot való- 
ban nem lehet hatékonyabban megol- 
dani. A módszer ilyen jellegű elrendezési 
problémáknál használható igazán -— 
legyen szó akár hasonló logikai feladat- 
ról vagy egy sakkfeladvány elemzéséről, 
akár egy iskola órarendjének elkészíté- 
séről, akár pedig egy sokváltozós, egy- 
mást befolyásoló tényezők szerint mű- 
ködő rendszer modellezéséről. Ezekben 
az esetekben egyedül a backtrack ad 
belátható időn belül használható ered- 
ményt. 


A szerkesztő azért van, 


hogy a lap olyan legyen. 


amilyenek az olvasói 
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Peremkerület kis mellékutcájának egyik 
épületén tábla: Csokonai Művelődési 
Ház. A BIT-LET olvasói számára nyilván 
nem ismeretlen a név, hiszen itt tartot- 
tuk az első BIT-LET Karácsonyt. Ez a 
ház a Borona székhelye. 


Nem mezőgazdasági kiállítás nyílt itt, a 
Borona a számítógépes cserepartner- és 
márkatárs-kereső szolgálat , fedőneve". 


- Úgy indult az egész — mondja Tóth 
Lajos igazgató -, hogy négy évvel ezelőtt 
mi kezdtünk el elsőként foglalkozni a 
számítástechnikával a művelődési há- 
zak között. Jó szoftveres és hardveres 
szakembereket sikerült összegyűjte- 
nünk, így klubjaink rövid idő alatt nép- 
szerűvé váltak, sőt tanfolyamokat is 
tudtunk szervezni. 


Valóban, a Csokonai mikrogépes klubjának 
jelenleg mintegy kilencven tagja van, ezen 
felül a csak itt működő Sinclair OL klub tag- 
jainak száma is hatvan. Így arra kényszerül- 
tek, hogy ,arisztokratizálják" a klubtag- 
ságot: ma már csak az léphet be, akit vala- 
melyik régebbi klubtag ajánl. 


—- Erre a szakembergárdára építve hoz- 
tuk létre a Mikroinform nevű szolgálta- 
tásunkat. Arra vállalkoztunk, hogy bár- 
kinek, aki akár személyesen, akár levél- 
ben hozzánk fordul a mikroszámítógépé- 
vel kapcsolatos kérdésekkel, annak in- 
gyenesen megadjuk, illetve megküldjük 
a választ. A Mikroinform bővült ki ké- 
sőbb, a BIT-LET Karácsony idején a 
Boronával. Ennek keretében az azonos 
érdeklődési körű számítógéptulajdono- 
sok teremthetnek kapcsolatot egymás- 
sal. Aki mikrogépes levelező- vagy cse- 
retársat keres, az egy kitöltött kérdőív 
és ötven forint befizetése ellenében 
megkapja az azonos érdeklődési körű 
partnerek nevét és címét. 


Az igény erre hatalmas, hiszen a kis telepü- 
léseken élőknek szinte semmiféle lehetősé- 
gük nincs arra, hogy megtalálják érdeklődési 
körüknek megfelelő társaikat — ezt bizonyítja 
a szerkesztőségünkhöz érkező rengeteg le- 
vél is. Így a művelődési házat a legkisebb 
falvakból is naponta keresik. 


—- Arra, hogy sokan mennyire fontosnak 
tartják a kapcsolatteremtést, jó példa 
az, amikor az egyik , társkereső" címét 
hibásan küldtük meg az érdeklődő part- 
nereknek. Nemcsak ő telefonált a hiba 
javítását kérve, hanem még négyen- 
öten, az ország legkülönbözőbb pontjai- 
ról, akiknek a rossz címzés ellenére sike- 
rült felvenniük a kapcsolatot a márka- 
társsal. Mára már oda jutottunk, hogy 
kénytelenek vagyunk szűkíteni, ponto- 
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sabbá tenni az érdeklődési köröket, 
mert nem tudjuk például egy-egy 
Commodore-tulajdonosnak valamennyi 
márkatársa címét elküldeni. A napok- 
ban készül el az új kérdőívünk, amely 
az előzőnél sokkal jobban behatárolja 
azt, hogy kit milyen jellegű programok 
érdekelnek. Arra már nem vállalkoz- 
hatunk, hogy annak is közvetítsünk 
partnert, akit , minden" érdekel. 


Minthogy a tanácsadó szolgálat ingyenes, 
a Borona pedig mindössze ötven forintba 
kerül, a vállalkozás nem tűnik nyereséges- 
nek — pedig az. Nyereséges, hiszen az in- 
formáció is pénzt ér. A Csokonai olyan adat- 
bázisra tett szert szolgáltatói tevékenysége 
révén, ami kamatozik. Közel 1500 mikro- 
géptulajdonos adatait tartják nyilván, és 
olyan tekintélyt vívtak ki, hogy vállalatok, 
intézmények egymás után hívják őket tan- 
folyamok megtartására, és sok az önkéntes 
felajánlás, anyagi támogatás is — így az 
Ipari Informatikai Központ ötvenezer forint 
értékű szakkönyvet adott át a háznak. 


- Annyira megnőtt az adatállományunk, 
hogy most keresünk egy olyan céget, 
mely hosszú távra kölcsönözne nekünk 
egy komolyabb gépet a nyilvántartási 
munkák megkönnyítésére. Ezért cseré- 
ben a szétküldött leveleinkben propagál- 
nánk is a gépet adó intézményt. 


A Csokonai Művelődési Házban nemrégi- 
ben megszűnt a szokásos heti disco is. 
Táncolni kevesebben akartak, mint számító- 
gépet kezelni, Így győzött a mikrogépesek 
akarata, akiket zavart a hangos zene. A szá- 
mítógépesek fanatikusak, így elérték azt is, 
hogy a házban a hét minden napján van 
számítógépes rendezvény. 


- Hozzánk bárki, bármikor bejöhet, és 
használhatja a gépeket - feltéve, hogy 
programozni vagy tanulni akar rajtuk, 
és nem játszani. Ahhoz nincs elegendő 
számítógépünk, hogy a gyerekek ezeken 
vívjanak űrháborút. Szervezünk családi 
tanfolyamokat is, érdekes módon itt 
jóval kisebb a lemorzsolódás, mint a 
csak felnőtteknek szóló tanfolyamaink- 
nál. 


A magyarázat könnyen kitalálható. Ha valaki 
munka mellett akarja elsajátítani a progra- 
mozás alapfogásait, hamar úgy érzi, hogy 
kevés erre az ideje, és fárasztja az újszerű 
tanulnivaló. Ha azonban azt látja, hogy a fia 
vele együtt halad, akkor szégyellné magát, 
ha lemaradna tőle. 


—- Szombatonként családias a hangulat: 
felnőttek, gyerekek együtt dolgoznak. 
9-től 14 óráig minden géptulajdonos- 
nak óránként 20 forintért biztosítjuk az 
áramot és a monitort. Ha valaki magával 
hozza a tv-t, akkor ingyen jöhet. 


A nagy januári havazás idején a házban 
minden program elmaradt. Kiürült a ház, 
az emberek inkább otthon maradtak a fűtött 
szobában. Csak szombat délelőtt didereg- 
tek néhányan a kapu előtt a hóviharban, 
hónuk alatt számítógéppel, spárgával össze- 
kötött monitorral. 


— Valódi közösség alakult ki itt. Egyszer 
az egyik klubtagunknak, egy tizenéves 
fiúnak eltűnt a gépe. A többi tag gyűj- 
tést szervezett, és negyed óra alatt 
összeadták a pénzt - így a fiú a követ- 
kező héten már újra dolgozhatott az új 
gépen. A számítógépesek megszállot- 
tak, sőt kicsit őrültek — de nem lehet 
nem szeretni őket — fejezi be Tóth Lajos. 
Tallér József 


A Borona olyan vállalkozás, amelyet 
nemcsak a Csokonai Művelődési Ház- 
zal kiépített régi jó kapcsolatunk miatt 
tartunk reklámozásra érdemesnek. Úgy 
gondoljuk ugyanis, hogy nemcsak a 
Művelődési Ház, de a hobbiszámító- 
gépesek, köztük olvasóink érdekeit is 
szolgálja. 

A Borona tehát elérhető az alábbi címen: 
Csokonai Művelődési Ház — 1153 Buda- 
pest, Eötvös u. 64-66. Telefon: 690-495, 
892-240 


—— fd Be [2 
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Januári számunkban beszámoltunk a 
BETA BASIC bővítés néhány hibájáról, 
amelyek a DELETE és a KEYIN utasítá- 
sokkal kapcsolatosak. Azóta kiderült, 
hogy a BETA BASIC még kevésbé töké- 
letes, mint eredetileg hittük. Most egy 
újabb hibára hívjuk fel a figyelmet. 


Szinte minden toolkit és BASIC bővítés 
parancslistájában megtaláljuk a RENUMBER 
utasítást. Ez a programsorok átszámozását 
hivatott elvégezni. 

Az utasítás működésének megértéséhez 
először nézzünk meg két másik parancsot! 
Az egyik a MOVE, a másik a COPY. A MOVE 
egy vagy több programsor átmozgatását 
végzi el, vagyis az eredeti sorok törlődnek, 
és újabbak íródnak be a kiválasztott helyre. 
A COPY az adott sort, illetve sorokat a meg- 
felelő területre másolja, de ekkor az eredeti 
sorok nem törlődnek. 

A BETA BASIC 3.0 változatban a MOVE 
utasításnak gyakorlatilag a RENUM K(re- 
number, azaz újraszámozás) felel meg, a 
COPY-nak pedig a RENUM:3k. A RENUM 
és a RENUM :k működését, különbözőségü- 
ket az ábra mutatja: 


RENUM ( ATOC ) 


A vessző nélküli és a vesszővel jelzétt prog: 
ramsorok tartalma megegyezik, csak :50or- 
számaik térnek el egymástól. 

Mindez hasznos szolgáltatás —: de van ai 
RENUM" utasításnak egy. Súlyos fogyaté- 
kossága. Ez akkor jelentkezik, ha csak egyet- 
len sort kívánunk átmásolni, és. a másolni 


kívánt sor, valamint a célsorszám között 
nincsenek további programsórok. 

Nézzünk erre egy mintapéldát. Gépeljük be: 
10 REM 

és adjuk ki a 

RENUM kk (10 TO 10) LINE 100 

parancsot. Ha lenyomjuk az ENTERT, a 
következő programlistát kapjuk: 


a Miskolci Nehézipari. 
1987. április 10-11. 


A Programcserebere teremben asztalbérlés: 


tévé és csatlakozási lehetőség 


10 REM 

100 REM 

10 REM 
Vagyis az átmásolt sor az eredeti sorszámá- 
val együtt a célsorszám mögött is megjelesat. 
Ha ezután a kurzort lefelé mozgatjuk a kép- 
ernyőn, akkor alul értelmetlen sorrendben 
jelennek meg a , bűnös" sorokszÓvatosan 
kísérletezzünk, mert a többi kurzormozgató 
billentyű lenyomására el is szállhát a rend- 
szer! 

Ha újra lenyomjuk az ENTER-t, akkor a lis- 
tában már két kurzor is láthátó. A felesleges 
sor csak az előtte lévő sor (illetve sorok) 
eltávolítása után tüntethető el"— de ezzel 
együtt perszerelőször is az eredeti sort kell 
törölni. 
A.hibát áz okozza, hogy az utasítás értelme- 
zésekor" rosszul"működik a"TO utáni ellen- 
őrző! rutin: Ha az átmásolás közvetlenül az 
áthelyezni kívánt Sor utáni területre történik, 
akkor laz eredeti sort az értelmező egy két 
sorból álló programblokknak tekinti, így a 
célsof után megismétli. Emiatt lesz két azo- 
nos számú sorunk. Ha a start- és a célsor 
között van még programsor, akkor a rutin 
helyesen hajtja végre feladatát. 
A BETA BASIC szerzői nem vették észre a 
hibát, hiszen az utasítás jelentősége első- 
sorban nagyobb programblokkok átmáso- 
lásánál érezhető. 

Egyetlen sor másolása a legegyszerűbben 
úgy valósítható meg hiba nélkül, ha a start- 
sort lehívjuk EDIT-tel, átírjuk a sorszámát, és 
ENTER-rel ismét bevisszük a memóriába. 


Rucz avos 


— óránként 20 forint 


ugyanez ?Jommodore 64-el és magnóval " — óránként 50 forint 


ugyenez Commodore 64-el és floppyval 


— óránként 60 forint 


Előjegyzésben mindez 209. kedvezménnyel. Előjegyzés telefonon j 
Egyetem KISZ Bizottságánál: 06-46-65-111/11-04 3 
Az előjegyzett helyeket négy napig tartják, ez idő alatt kell befizetni 


a pénzt a következő címre: 


MIKRO MEN - KISZ Bizottság — 3515 Miskolc — Éyetotávárós 


Lapzártakor a programok szervezése még tart. Lesznek program- és gép- 
bemutatók, vállalatok, felhasználók találkozhatnak IBM kompatibilis gépekre 
írott szoftverekkel és azok szerzőivel. Lesz bemutató tanítás a számítástech- 
nikát oktató tanároknak, találkozó az SEYETENt san onnek] a ÚjaKa köz- 
TALEÉTÉII és műszakia . 

A miskolci egyetei 


Szubjektív véleményem szerint a BIT-LET egyik legpozi- 
tívabb rovata a SORVEZETŐ volt. Több írásával vitatkoztam, 
de olyan , hézagpótló" szerepet játszott, ami nagyobb hibák- 
kal szemben is elnézővé tett volna. Konkrétabban: a szinte 
teljesen elhanyagolt tanárképzés területén próbálkozott... 
Rossz ómen ennek a hamvába-holt sorozatnak a felélesztését 
célul tűzni, de feltétlenül szükség lenne valami hasonlóra, 
ezért megpróbálkozunk vele. 


1986 végén komoly központi támogatással indult egy kísérlet , A szá- 
mítástechnika matematika orientált oktatása" címmel. Különböző 
adminisztratív okok miatt a kísérlet óvatos csendben indult el két 
irányba: Simonovits Miklós vezeti az ún. IRÁNYÍTOTT vonalat. Ennek 
keretén belül 8-10 középiskolában olyan tanterv szerint oktatnak, 
amelyik S. M. , Számítástechnika" tankönyvén alapul. A másik vona- 
lon 10-12 pedagógus saját elképzeléseit próbálgatja. Új Sorveze- 
tőnkben megpróbáljuk erről a kísérletről röviden informálni a BIT- 
LET-et olvasó tanárokat. Szeretnénk például hasznos anyagokat 
közölni nem teljesen kezdő foglalkozásokhoz (szakköri és órai mun- 
kához egyaránt). Ezenkívül bárki ötletének. módszereinek, észrevé- 
teleinek szívesen biztosítunk fórumot. 


A kísérletről röviden 


A Művelődésügyi Minisztérium Közoktatási Kutatások Titkársága által 
menedzselt kísérlet célja egy olyan koncepció kialakítása, melyben 
a számítástechnikai ismeretek közvetlen egységben jelentkeznének 
a társ-tantárgyakkal, esetünkben a matematikával. Nem állítjuk, hogy 
a matematika mással nem helyettesíthető, pusztán arról van szó, 
hogy a kísérlet vezetői és résztvevői elsősorban ehhez értenek és 
vonzódnak. Kapcsolatra törekszünk más irányokkal is. 


Részletesebben azt szeretnénk, hogy a matematikaórákon tanult 
számítógépes ismeretek egy sokkal eredményesebb, alaposabb, és 
magasabb szintű matematika tanításhoz vezessenek. Mindenkor át- 
lagos — nem tagozatos — osztályokat veszünk célba, mégha ennek 
eleinte ellent is mond a kísérletben részt vevő iskolák színvonala. 
Nem szakköri körülményekben gondolkodunk, de próbálunk tekin- 
tettel lenni a diákok különböző szintű alapismereteire. 


A résztvevő pedagógusok egy néhány oldalas tematikát adtak be: 
hogyan képzelik el az oktatást. Tanév közben kéthavonta küldenek 
óravázlatokat, illetve naplót: mikor, mi történt valójában. Év végén 
pár oldalon foglalják össze, mit, hogyan sikerült megvalósítani, mik 
a tanulságok. Évente 2—3 alkalommal összegyűlve megismerhetik 
egymás elképzeléseit, gondjait, és tervezünk szakmai továbbképzést, 
bemutatót is. 


Részben a kísérlethez, (részben hagyományainkhoz) kapcsolódik 
egy évközbeni haladó szakkör, amelyet több középiskolával közösen 
többek között a KFKI nyári táborainak leghaladóbb tagjainak tartunk. 
Ennek anyagából valók az alábbi feladatok. Külön fölhívnánk az 
olvasók figyelmét a színes alányomással kiemelt kérdésekre. Ezek 
megoldásai beküldhetők. Ebből egyrészt az anvagok visszhangjára 
szeretnénk következtetni, másrészt sok kérdésre magunk sem ismer- 
jük az egzakt feleletet. A helyes (és frappáns) válaszok beküldői 
között apróságokat (floppy, kazetta, BIT-LET-ek stb.) sorsolunk ki. 
A megoldásokat kivételesen nem a BIT-LET hanem a szerző 
címére küldjék. Azaz: Török Turul — 1525 Budapest MTA 
KFKI Pf. : 49. 


Bolyongástól a 


sajoux görbékig 


1. feladat. Tekintsünk a képernyőn egy A, B oldalú téglalapot. 
Ennek egy belső pontjából kiindulva determinisztikusan ,. bolyong" 
egy pont. Azaz, az oldalakkal 459-os szöget bezáró egyenesek mentén 
mozoghat, és a határokon rugalmasan visszaverődik. Használjunk 
,.:karakter-grafikát" (CHAR, PRINT, PRINT AT stb.), és A, B illetve a 
kezdőpont legyen véletlenszerű ! 
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:HEXT 
: HET 


e s 


—-.1 THEN 0 
mai THEN BY 


X1 és Y1 az oldalhosszak, 45-ben X és Y a kezdőpont koordinátái. 
DX és DY (mindkettő 1 vagy -1) a bolyongás pillanatnyi irányát 
határozzák meg. 

Futtassuk néhányszor a programot! Remélhetőleg mindenkiben kér- 
dések és észrevételek tömege fogalmazódik meg, pld.: 

a) Mikor van vége a ,.dolognak"? Mi történik amikor nem történik 
semmi? 

b) Lehetne-e gyorsítani a bolyongást, hiszen nagyobb téglalapon 
bizony unalmas egy kicsit. 

c) Mitől függ az ábra telítettsége? Próbáljunk valami törvényszerű- 
séget felfedezni ! 

Gondolkozzunk el egy kicsit a kérdéseken. A gyorsítás lényegében 
technikai probléma: vegyük észre, hogy az IF-es sorok (110-115) 
túl gyakran kerülnek végrehajtásra. Valóban felesleges minden lépés- 
nél megnézni, falnál vagyunk-e. Előre ki is számíthatjuk, mikor kell 
visszaverődni, pontosabban: vízszintes, avagy függőleges fal lesz a 
következő. Némi töprengés után adódik az alábbi változat: 


für 


26 


4.1 


PHIC 
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s VC) (Zx:ORAW 1 


SZER G ÜL zzz: NZSHEZC 


:ORAN 1 TD Két 
158 


3 TO 


Három eset van: 

— függőleges fal — 160. sor 

— vízszintes fal — 170. sor 

— mindkettő egyszerre (sarok) — 180-190. sorok 

X1 és Y1 jelentése is megváltozott, a legutóbbi visszaverődés helyét 
mutatják. Ez a program már méltó a finom grafikára.! A további 
gyorsítás már összefügg az első kérdéssel. Figyeljük meg, hogy bizo- 
nyos esetekben egy időre megszakad a bolyongás, majd a kiindulási 
pontból ellenkező irányba folytatódik. Mikor lesz ilyen, és valóban 
, Várakozik" -e ilyenkor a gép? 


Két esetet kell megkülönböztetnünk : 

— A mozgó pont eljut valamelyik sarokba. Ilyenkor úgy verődik vissza, 
hogy saját addigi nyomán halad (vissza) a kiindulásig, majd onnan 
ellenkező irányba szalad. Hol végződik ilyenkor a bolyongás: melyik 
lesz az utolsónak kivilágított pont? 

— Nem megy sarokba a pont. Hogyan végződik ilyenkor a bolyongás? 
Mitől függ, a két eset közül melyik következik be? 


200-220 sorokban vizsgáljuk: abba lehet-e hagyni? 205 -— sarok 
érintése helyett visszatér önmagába. 210 — kétszer volt sarokban. 

A harmadik kérdéshez először próbáljuk meg jellemezni az ábrát 
telítettség szempontjából! A gyerekek ilyeneket fognak javasolni: 
számoljuk meg a pontokat, milyen távol vannak egymástól a pár- 
huzamosok, hány metszéspont van stb. Javasoljuk azt nekik, figyel- 
jék meg, hogy hányszor érinti az oldalakat a bolyongás, azaz egy 
számpár (X9, Y9) legyen a jellemző. Nos, ez vajon mitől függ. és 
hogyan? Talán lesz aki észreveszi, hogy az oldalakkal (A, B) van 
kapcsolatban a dolog, de hogy hogyan ... 

További segítség, ha az oldalakat INPUT-tal adjuk meg, és így már 
mi szabhatjuk meg, milyen téglalapon kísérletezzünk. Készítessünk 
táblázatot a tanulókkal, és talán már 4-5 próbálkozás után születik 
valamilyen hasznos megfigyelés. 


2. feladat. Írjunk programot, mely tetszőleges x--f(x) függvényt 
ábrázol, sőt a görbét , optimálisan" helyezi el a képernyőn! Szám- 
talan megoldás ismeretes, közlünk egy nem túl bonyolult változatot: 
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10-ben adható meg a függvény egyenlete. míg a 20-as sorban az 
xe[lA. B] értelmezési tartományt jelölhetjük ki. Fontos, hogy az 
A pontban valóban legyen értelmezve a függvény — esetünkben 
A bármi lehet —2, —1, 0, 1 kivételével. A többi (belső) pontra van 
védelem a 90. sorban. 100-150 sorokban az Y szélsőértékei (MAx 
és MIln) segítségével beállítjuk a függőleges léptéket, majd ennek 
alapján ábrázoljuk a már tárolt pontokat. (A(1)-k). DX és DY meg- 
határozását automatikus normálásnak nevezik. 

3. feladat. Ha egy R — 100 sugarú kört akarunk a képernyőre raj- 
zolni, akkor használhatjuk a következő összefüggést is: 

x — Rxcos(t) y - Raksin(t). 


[29 


Az ilyen megadást a görbék paraméteres (implicit) egyenletének 
nevezzük. Elég annyit tudni róla, hogy a programban t paraméter lesz 
a ciklus változó, és a pontok x, y koordinátáit a fenti két összefüggés 
adja. Még arról kell gondoskodnunk. hogy a kör férjen el teljes egé- 
szében a TV-n, sőt minél ,.optimálisabban" helyezzük el. 
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HCTA 

58 t-i5s3 3: B—z tn 

783 OT-(B—Hu"H4 

zö3 GEHFHIC 1.1 

z87 DERW 1.FUXCB-41B8.EHVYCBIHLBB 
zZ18 FOR T-A TD BE STEP DT 

zzú DERW 1 TŐ LÖBZFHSCT?, LÖBHENYET E 
228 HEAT T 


Sok érdekes ábrát nyerhetünk, ha gondoskodunk a programban 
megfelelő elhelyezésről, az automatikus normálásról (az X és Y lép- 
tékek kiválasztása). Paraméteres megadásnál ez egy kicsit bonyo- 
lultabb, (és lassabb is) mint az x--f(x)"esetben, de némi töprengés 
után adódik: 


az 
198 
128 § THEN XFSXCI) 
is x 
128 F THEM VFzWCIj 
123 vél, 
138 
158 
339 

ra KE d ut 

b5) 


DRAMH 1 TO CSCIY—-RANEOK 
NEXT I 


. Ve TT 92—vAz kDV 


Ez a programunk már túlságosan is önálló: például nem hajlandó kört 
rajzolni. Kárpótlásul néhány érdekesebb egyenletet adunk meg, lehet 
gyönyörködni. 


xt/ (1ttiktit 
aetkt/(1ttakt 
os(t) ax (1-tcos(t)) 


aetat/(1ttiktakt) — — Descartes-levél 
txt/(1ttat) — cisszoid 
£ a (1tcos(t))  —kardioid 


36(t—b:ksin(t)) 1—b:kcos(t)) — ciklois 
36c053(t, sin3(t) — asztrois 
os(axt) in(baet) — Lissajoux-görbe 


Utolsó egyenleteink pontosan olyan problematikához vezetnek, 
mint amit az 1. feladatnál gondoltunk végig. Az ábra bonyolultságát 
lényegében ugyanúgy befolyásolják most az a és b együtthatók, 
mint annak idején a téglalap oldalai. További analógia. hogy mindkét 
ábra hengerre rajzolva képzelhető el igazán: például egy jobb oldali 
(felső) határpont előbb-utóbb megjelenik baloldalt (alul) a tégla- 
lapon. Másként fogalmazva: az 1. feladatbeli bolyongás tulajdonkép- 
pen egy henger palástján történik, majd alkalmas helyen felvágva a 
palástot, és kiterítve adódik a kívánt téglalap. 

A Lissajoux görbék III. osztályban fizikában szerepelnek. 


Török Turul 
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M eggyesházi Péter-Pintér József: ZX 
Spectrum haladóknak — Műszaki Könyv- 
kiadó, 199. o.., 78 Ft. 

(A szerzők röviden ismertetik a Spectrum 
sajátosságait, a 280 assembly használatát, 
a ROM-programot, valamint az Interface 
1-et és a Microdive-ot. Ezután gazdag 
prugramkatalógust, valamint egy jól hasz- 
nálható rutingyűjtemény-listát közölnek.) 


C16 és Plus/4 programozói útmutató — 
Novotrade, 86. o., 129 Ft 

(A programozási kézikönyv folytatása a 
BASIC alapismeretek áttekintése után a 
gépi kódú programozásba nyújt betekin- 
tést. A kötetet számos, jól használható füg- 
gelék egészíti ki.) 


Grohmann-Eichler: A 68 000-es mikro- 
processzor — DATA BECKER - Novotrade, 
368. o., 349 Ft. 

(A könyv a Motorola mikroprocesszor-csa- 
ládot mutatja be: ismerteti kifejlesztésének 
történetét, felépítését, input—output jellem- 
zőit, utasításkészletét. A kötet szerzői kítér- 
nek arra is, hogy a 68000-es mennyiben tér 
el a többi 16 bites processzortól.) 


Sasse: Compiler — DATA BECKER - 
Novotrade, 350 o., 298 Ft. 

(A szerző a programnyelveket fordító rend- 
szerek alapismereteibe vezeti be az olvasót, 
egy erre a célra kifejlesztett programnyelv 
segítségével. Megismerhetőek a lexikális, 
a szintaktikai és a szemantikai elemzés sza- 
bályai, valamint az assembler néhány sajá- 
tossága.) 


Tanulmányok 
EELKKkliLBSB E 


nform gazdaságról 


(Szerkesztő : Szabó József) — 
KSH-OMIKK. 234. o., 260 Ft. 


Előző számunkban bemutattuk a Statisztikai 
Kiadó kötetét, mely a francia informatikai 
forradalommal, illetve annak gazdasági, tár- 
sadalmi hatásaival foglalkozik. 

Az informatika kihívása ugyanúgy érezhető 
Magyarországon is, mint bármely más or- 
szágban — ezért szervezett 1985-ben a Köz- 
ponti Statisztikai Hivatal szemináriumot az 
információgazdaságról. A  szemináriumra 
készült előadásokból ad válogatást a most 
megjelent kötet. 

A megrendezett konferencia frontáttörésnek 
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nevezhető, hiszen előzmények nélküli vál- 
lalkozás volt. Szerte a világban tíz éve hatal- 
mas vitát folytatnak a szakemberek az infor- 
matika gazdasági szerepéről, hatásáról — er- 
ről ezidáig itthon nem vettünk tudomást. 
Emiatt megérthetők és elfogadhatók a kötet 
gyermekbetegségei. Nem hibáztathatók a né- 
pes szerzőgárda tagjai amiatt, hogy szinte 
mindegyikük az alapfogalmaktól indul el, 
azokatmagyarázza részletesen, és ennek alap- 
ján építi fel saját mondanivalóját, — hiszen egy 
konferencián ez természetes. Az sem róható 
fel nekik, hogy az egyes fogalmak definíciói, 
meghatározásai nem mindig egyértelműek, 
nem mindig letisztultak — elvégre egy most 
kialakulóban lévő tudományág részei. 
A nyelvezet is körülményes néhol, nehezen 
átrágható. 

A szerzők saját szakterületüknek megfelelően 
fejtik ki tapasztalataikat, kutatási eredményei- 
ket az információgazdaságról. Így a leg- 
különbözőbb szakágak képviselőinek véle- 
ményét olvashatjuk, a politológiától a tér- 
képészetig. Mindegyikük megpróbálja adap- 


tálni saját szakmájában a külföldi eredmé- 
nyeket. Ez érthető álláspont — de a könyvből 
nem sugárzik egységes szemléletmód. 
Heterogén a kötet, és a szerkesztő nagy ér- 
deme, hogy az említett hibák ellenére egy- 
huzamban végigolvasható. 
Lemaradásunk az informatikában a fejlett 
országokhoz képest hatalmas. Hogy mennyi, 
arról eltér a szerzők véleménye (10-20-30 
év), de az egyértelműen kiderül, hogy néhány 
mutató szerint a fejlődő országokkal vagyunk 
egy szinten. A közgazdászok számára ha- 
talmas felkiáltójel lehet ez a kötet, hiszen a 
reformelképzelésekben is csak huszadrangú 
tényezőként kap szerepet az informatika — 
mostanáig nem jöttünk rá, hogy ez minden- 
hol húzóiparág. 
Talán napjainkban ébrednek rá mind több 
helyen az informatikai kutatások szerepére 
— és ez is aláhúzza a kötet fontosságát -, 
hiszen egyre több vállalat, intézmény kér 
fel szakembereket annak vizsgálatára, hogy 
egy-egy tervezett informatikai fejlesztésnek 
milyen eredményei, hatásai várhatóak. S a 
hatások alatt nem csak a gazdasági eredmé- 
nyeket kell értenünk, hanem azt is, hogy a 
fejlesztés — nyilvánvalóan befolyásolja az 
adott vállalat szerkezetét is. Itt kell megemlí- 
tenünk a kötet egy másik fogyatékosságát: 
a tanulmányok szerzőinek legtöbbje erősen 
technokrata szemszögből elemzi a bekövet- 
kezett és a várható változásokat. Hiányzik a 
társadalomtudományi, a szociológiai meg- 
közelítés, pedig minden forradalmi jelentő- 
ségű ipari megújhodás esetében nyilván- 
való, hogy a technológia nem előidézője a 
forradalomnak, hanem csupán (?) kitelje- 
sedése. Az összeállításban olvashatunk 
ugyan erre vonatkozó utalásokat, de annak 
elemzésére, hogy az informatika magyar- 
országi elterjedésének mik a társadalmi elő- 
feltételei, nem vállalkozik egyik szerző sem. 
A kötet mindenesetre kísérletet tett az infor- 
mációgazdaság fogalmának tisztázására. Nem 
biztos, hogy a tanulmányokból leszűrhető 
definíció mindenben helytálló, de konzisz- 
tens, ellentmondásmentes egészet képez. 
Levonható az a következtetés is, hogy égető 
szükség van országos, átfogó információs 
politika kidolgozására. Így a könyv nemcsak 
a közgazdászok, a gazdasági vezetők szá- 
mára lehet fontos és hasznos olvasmány, 
hanem a társadalomtudósok, a politikával 
foglalkozó szakemberek számára is — sőt 
oktatási célokra is ajánlható. 
Az első kísérletet nyilvánvalóan további ku- 
tatásoknak kell követniük, de már ez a kötet 
is figyelemfelkeltő és gondolatébresztő. 
Tallér József 


0) 


Az elmúlt nyáron az NSZK-ban vet- 
tem egy új sorozatú C64-et. Az el- 
adók elmondták, hogy a régi típus- 
tól eltérő vonás az úgynevezett 
GEOS megléte. Mi az a GEOS? 
Mire lehet használni? Hogy lehet 
működésbe hozni? 

Kresz Gábor 

-— Bóly Szabadság u. 49. 


A GEOS egy új rendszerprogram a 
C64-hez. Ön kellett, hogy kapjon a 
gépéhez egy lemezt és egy kis 
használatú útmutatót. Ezen.a leme- 
zen van a GEOS, ha ezt betölti egy 
alapvetően más rendszerben hasz- 
nálhatja a gépét joystick vagy egér 
segítségével. A lemezén a rendszer- 
ben írott két komolyabb felhasználói 
programot is talál: a GEOPAINT-et 
és a GEOWRITE-ot. Előbbi egy ki- 
tűnő rajzoló, utóbbi egy szövegszer- 
kesztő-féleség. Hogy ezeket a prog- 
ramokat és egyáltalán magát a rend- 
szert hogyan kell használni, azt a 
használati útmutatóból tudhatja meg. 
Mivel ezt ön nyilván németül kapta 
meg a gépéhez, fölhívjuk a figyel- 
mét, hogy az Országos Commodore 
Egyesület C—újságjában a januári 
számmal kezdődően sorozatban köz- 
lik a GEOS rövidített magyar nyel- 
vű használati útmutatóját. (A lapot 
az egyesület tagjai kaphatják, s hogy 
hogy lehet az egyesület tagja, 

bek kérésére az alábbikban. 


COMMODORE EGYESÜLET 

Minthogy többen kérdezik tőlünk is, hogy 
ert kj lehet hozzájutni a Commodore Egye- 
sület 


küldik az újságot, benne egy vagy két 50 
forintos vásárlási tikettel. (Így tehát a tag- 
díj nagyobbik ré: visszatérül. 

A tagdíjat be I. 

pénzküldő csekkei 


XII., 
OTP 565-3610 


" Többen kérdezték tőlünk, hogy ho- 


gyan lehetne hozzájutni lapunk de- 
cemberi számában csak egy fotó 
erejéig bemutatott Szarka György 
és Tihor Miklós által készített, s leg- 
jobbnak minősített Vadász és a nyúl 
című játékprogramhoz. Nos régi 
szokásunk, hogy olvasóinkat, pláne 
meg programozó barátainkat szíve- 
sen összehozzuk egymással. (Láthat- 
ják, hogy hacsak külön nem kéri va- 
laki ennek az ellenkezőjét, rendre kö- 
zöljük szerzőink lakáscímét is.) :me 
tehát Tihor Miklós címe is. De a vá- 
laszra várók legyenek türelemmel, 
mert szegény e pillanatban előfel- 
vételis lévén sorkatonai szolgálatát 
tölti. A cím: Tihor Miklós — 1181 
Budapest, Városház u. 31. 


PLUSZ 4 NYERO 2. FELADA 


MEGOLDASA 


Helyhiány miatt csak egy vázlatos megoldást közlünk. Könnyű volt észrevenni, 


NAK 


hogy a tulajdonképpeni stratégia a H mátrixban van eltárolva. A H mátrix így 


nézki: 
A H(,) tömb DIM H(633) 
he S ES EEG EZ SEBERZ AZAZ 
] ! IT 
kezte ete ete RH egett e 
olejz[ó[ajílóls[ols[2]5[2]J11als[4al2]5Ís[1151516141413141514161510 
2jajzja az [dja j2Jajajajz [2 2[z[z]ajz[2]2J1[2]1[2/2]1]2]2[2]12][2]12 
BENLJEILIKITIE 0]111133]201131151 0 116] 5 119 127120126122117130122]31] 31281291 31191 0 113 
ifola[jolíjolí1[o[110]1]10 eebtete ee oate et 
11013]10[5 olzfola oz or 3[ojojojz[o[o[£ sjols[ololo[o[o0[0171010 
Az oszlopszám az állás sorszámát je- lehetséges, hogy a nyúl ott áll. Ebben az 
lenti, a következőket figyelembe véve: esetben lépéskor a megfelelő alállást kell 


Az állásokat első lépésben csak a vadászok 
helyzete alapján különböztetjük meg. Két 
állást azonosnak tekintünk, ha a 4 vadász 
ugyanabban a konfigurációban, vagy annak 
tükörképében van. Az , ugyanabban a kon- 
figurációban" magában foglalja a bal széltől 
való távolságokat, de az egész konfiguráció- 
nak a tábla aljától vett távolságát nem. Így, 
ha a 4 vadász alulról a 2. sorban van, az 
tükörképe a kiinduló állásnak, ha a 3-ban, 
az azonos vele. 

Egy állás alállásának azt nevezzük, ha a nyúl 
pont azon a pozíción áll, ahová valamelyik 
vadász éppen lépni szeretne. A nyúl többi 
helyzete szerint nem különböztetünk meg. 
Egy menet közben kialakuló vadász-kon- 
figurációt úgy jellemezhetünk, hogy meg- 
adjuk melyik alap-konfigurációnak felel meg, 
annak tükörképe, vagy nem. s hogy a leg- 
alsó vadász alulról hányadik sorban áll. 

A H mátrix értelmezése: 1-2. sor annak 
a vadásznak a relatív koordinátái, mellyel 
lépni szeretne a gép. Az első koordinátához 
hozzáadva a legalsó vadász helyének sor- 
koordinátáját, a másodikat pedig 7-ből ki- 
vonva, ha tükörképről van szó, megkapjuk 
az illető vadász abszolút koordinátáit (mind- 
kettő: 0-tól 7-ig terjedhet). A 3. sor a kívánt 
lépés irányát adja meg: 1 — jobbra, 2 — balra 
tükörkép állás esetén persze fordítva. 

A 4. sor adja meg, hogy ezt lépve hányas 
állásba jutunk, ill. 0, ha ezt lépve a vadász 
nyer, az 5. és 6. pedig azt, hogy hová kerül 


a vadász, de ezt csak abban az esetben, ha 
3 


tekinteni, melynek sorszáma mindig 1-gyel 
nagyobb az állás sorszámánál. Észrevétel: 
az alállásoknak nincs alállásuk, hiszen ide 
csak úgy kerülhetünk, ha tudjuk, hogy a 
nyúl az eredeti állás úgynevezett érzékeny 
pontján áll, s az alállásban mindig ennek 
megfelelően máshová próbálunk lépni. A já- 
ték az 1-es állásból indul, s az 1. ábra szerint 
folyhat le: a rendes nyíl jelenti azt, hogy azt 
léptük, amit szerettünk volna, a szaggatott 
nyíl azt, hogy az érzékeny ponton áll a nyúl, 
így az alállás szerint kell lépni. Azt kell még 
megnéznünk, hogy miért nincs minden ál- 
lásnak alállása? 9 állásnak nincs alállása, 
ezek: 15, 16, 19, 26, 27, 28, 29, 30, 33. A 
magyarázat az, hogy ezek úgy alakulhatnak 
csak ki, ha néhány lépéssel hamarabb a 
nyúl az akkori állás érzékeny pontján állt, 
így kiszámítható, hogy az azóta eltelt lépései 
alatt milyen messze juthatott. Ha az állás 
érzékeny pontját semmiképp sem érhette el, 
akkor nincs szükség alállásra. Ez mind a 9 
esetben ellenőrizhető az 1. ábra segítsé- 
gével, csak fel kell rajzolni az egyes állás- 
sorszámokhoz tartozó ábrákat. Ezt a 21 áb- 
rát hely híján nem tudjuk közölni. Az eddi- 
gieket elfogadva a stratégia működőképes- 
sége könnyen látható, ugyanis pl. az előbb 
említett módon minden álláshoz hozzá- 
rendelhető a nyúl összes lehetséges helyzete, 
s látható, hogy a nyúl sose tud a vadászok 
mögé kerülni. Így a játék csakis a vadászok 

győzelmével érhet véget (csak 8 sor 
van!) 
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vetkező számunk fidekikátek as ÖUStO SA szátaítástáshűlka 


GÉPNYERŐ 
ÉRTÉKELÉSE 


A februári Gépnyerősorsoláson a Commo- 
dore Plusz 4-es gépet Szilvási Margit- 
nak (Budapest) húztuk ki. 1 doboz disket 
nyert: Kruzslicz Ferenc, Tótkomlós, 1000 
forintos vásárlási utalványt Szabó Zol- 
tán Tibor, Budapest, és 500-500 forintos 
utalványt: 

Kozma Benedek, Budapest 

Tinkó Attila, Budapest 

"Kovács Gábor, Vác 

Kurusa Árpád, Szeged 

Horváth Péter, Budapest 

Peták Tamás, Szolnok 

Földvári Csongor, Budapest 


A HARMADGÉPNYERŐ ÉRTÉKELÉSE 


Mindhárom feladatra csak 20 pályázónk küldött be megoldást. Az első feladat elég könnyűnek 
bizonyult, bár 1-2 részfeladatot sokan elrontottak. A második sem volt annyira nehéz, mint 
gondoltuk, a mienknél egyszerűbb megoldások is érkeztek. Többen nem vették észre, hogy a 
17-es feladat visszavezethető-e a 16-osra, s így külön hosszan bizonyították. A harmadik 
feladat rázósabbnak bizonyult. Két fő hiba: többen nem végezték el a lépésszámbecslést, és 
többen kódolásnál is komoly algoritmus lépéseket végeztettek szegény kódolóval, ráadásul 
a kódoló algoritmusának lépésszámát általában nem becsülték meg. 

A potenciális nyertesek: 

2 cédulával: Földvári Csongor, Budapest; Szabó Zoltán, Budapest; Bíró Gábor, Kisvárda; 
Voronnai László, Budapest; Morvai Lajos, Budapest; Solymosi György Budapest; 
Peták Tamás, Szolnok A 

1 cédulával: Fekete Zoltán, Szolnok; Veress Zoltán, Újfehértó ; Almássy Zoltán, Miskolc 
A sorsolásra 1987. április 18-án 10 órakor kerül sor az Almássy téri Szabadidő Köz- 
pont Compánia számítógépes műhelyében. 

Figyelem! Múlt havi számunkban tévesen jelent meg a Ouatroplus nyerő sorsolási 
időpontja. Azt is ugyanebben -az időpontban sorsoljuk! 

Amint azt már a múlt hónapban beharangoztuk, három hónapos pályázatot indítunk, 
amelynek első díját a Skála Computer S hálózata ajánlotta föl. A nyereményért 
három olyan feladatot kell megoldani, amelyek ugyan apró kis programok, de 
megoldhatók és értékelhetők gép nélkül is. 

Nagyon kérjük az olvasókat, hogy megoldásaikat ne kazettán, lemezen küldjék 
be! Egyszerűen csak írják le egy papírra. 


Az viszont értelemszerű, hogy a pályázóknak legalább alapfokon ismerni kell a 
BASIC nyelvet. 

Az első feladat: egy gép (pl. CMIN8 a neve) BASIC-je igen kevés utasítást ismer : 

- A PRINT, LET, INPUT, DIM és END utasítások a legtöbb BASIC-hez hasonlóan 
működnek. 

— Ismeri a GOTO K utasítást, ahol K tetszőleges aritmetikai kifejezés. Ha ilyen 
utasításhoz ér, kiszámítja K értékét, s ha van K sorszámú sor, akkor oda ugrik, 
különben hibát jelez. 

— Ismeri a t, —, kk, /, t műveleteket és a—, — 
műveletnek tekint, s az eredmény -1, ha a relá 
(elsőbbségi) sorrend: 

ke ! 2: x/ 3: 1, - 

de, 3, 2, sem dés 

Azonos , erősségű" műveleteket balról jobbra végez el. 

Zárójelezés lehetséges. 

— Ismeri a BASIC alapfüggvényeit: 

ABS, ATN, CO$, EXP, INT, LOG, SGN, SIN, SOR 

- Tud kezelni stringeket, stringek között értelmes a t művelet (konkatenáció) és 
az -, — n-relációk. Ismeri az INKEY $ függvényt is. 

— 1 sorba 1 utasítás írható! 

Írjunk ebben a BASIC-ben (tehát csak a felsorolt utasítások használhatók) egy 
programot, mely a következőket tudja: 

Bekérdezi N értékét, ellenőrzi, hogy pozitív egész szám e. Ha nem, akkor újra kér- 
dez. 

Ezután sorban bekérdez N db számot, majd ezeket sorbarendezve (növekvő sor- 
rendben) kiírja. 

Ezután vár egy tetszőleges billentyű leütésére. 

(Akik az INKEY $-t nem ismernék, leírjuk hagyományos BASIC-ben ennek meg- 
valósítását: 

100 0$-INKEY$ 

101 IF 0$-" "THEN GOTO 100.) 

— Ha ez a billentyű K, I vagy SPACE, akkor megvizsgálja, hogy a sorbarendezéskor 
kapott legkisebb szám pozitív 10-nél kisebb egész szám-e, (ha nem, ezt szöveggel 
jelzi!) ha igen, akkor kiírja a számot betűvel két nyelven, s megáll. 

— Ha a leütött billentyű más, elbúcsúzik és megáll. 

A programokat papíron kérjük beküldeni, lehetőleg rövid magyarázattal. A rövi- 
debb, elegánsabb programok több pontot kapnak! 


z, cz, mm, c s relációkat, melyeket 
fennáll, s 0, ha nem. Precedencia 
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